object fhpmanutencao: Tfhpmanutencao
  Left = 633
  Top = 366
  Align = alCustom
  BorderIcons = [biHelp]
  BorderStyle = bsSingle
  Caption = 'Manuten'#231#227'o Hist'#243'rico Padr'#227'o'
  ClientHeight = 179
  ClientWidth = 448
  Color = 16776176
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = 'System'
  Font.Style = [fsBold]
  KeyPreview = True
  OldCreateOrder = False
  Position = poMainFormCenter
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 16
  object Panel1: TPanel
    Left = 8
    Top = 8
    Width = 429
    Height = 121
    BevelInner = bvLowered
    BevelOuter = bvLowered
    Color = 16776176
    TabOrder = 0
    object Label1: TLabel
      Left = 6
      Top = 16
      Width = 95
      Height = 17
      AutoSize = False
      Caption = 'C'#243'digo'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 6
      Top = 63
      Width = 96
      Height = 17
      AutoSize = False
      Caption = 'Nome'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
    end
    object mcodigo: TMaskEdit
      Left = 6
      Top = 33
      Width = 70
      Height = 22
      EditMask = '999;0;_'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      MaxLength = 3
      ParentFont = False
      TabOrder = 0
      OnExit = mcodigoExit
    end
    object mnome: TMaskEdit
      Left = 6
      Top = 80
      Width = 281
      Height = 22
      CharCase = ecUpperCase
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      MaxLength = 40
      ParentFont = False
      TabOrder = 1
    end
  end
  object Button1: TButton
    Left = 284
    Top = 136
    Width = 75
    Height = 25
    Caption = '&Gravar'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 1
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 360
    Top = 136
    Width = 75
    Height = 25
    Caption = '&Cancelar'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 2
    OnClick = Button2Click
  end
  object IBCConnection1: TIBCConnection
    Database = 'C:\banco\BRASFORT.FDB'
    ClientLibrary = 'gds32.dll'
    Username = 'sysdba'
    Password = 'masterkey'
    Server = 'localhost'
    Connected = True
    Left = 16
    Top = 128
  end
  object IBCTransaction1: TIBCTransaction
    DefaultConnection = IBCConnection1
    Left = 88
    Top = 128
  end
  object AtualizaQuery: TIBCQuery
    Connection = IBCConnection1
    SQL.Strings = (
      'select *from hp')
    Left = 48
    Top = 128
    object AtualizaQueryCODIGO: TIntegerField
      FieldName = 'CODIGO'
    end
    object AtualizaQueryDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      Size = 100
    end
  end
end
